object FormUsers: TFormUsers
  Left = 288
  Top = 305
  Width = 640
  Height = 354
  Caption = #1055#1086#1083#1100#1079#1086#1074#1072#1090#1077#1083#1080
  Color = clBtnFace
  Constraints.MinHeight = 340
  Constraints.MinWidth = 570
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  OnKeyUp = FormKeyUp
  DesignSize = (
    632
    320)
  PixelsPerInch = 96
  TextHeight = 13
  object BitBtnInsert: TBitBtn
    Left = 4
    Top = 294
    Width = 85
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1053#1086#1074#1099#1081' (F3)'
    TabOrder = 2
    OnClick = BitBtnInsertClick
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000003232
      3200FFFFFF000E0E0E0000501900E2E2E200E1E1E100E0E0E000DFDFDF00DEDE
      DE00DDDDDD00DCDCDC003DB90000B1FFB100DBDBDB0034F5670000B93D00DADA
      DA002FF26400D9D9D900D8D8D8008EFF8E0029EF610025ED5F0082F99600D7D7
      D7002DF163002AF061001BE0550012D34D00D6D6D6000FCE4A0021EB5B00D5D5
      D500D4D4D4001BE85800D3D3D30015E55500D2D2D200D1D1D100D0D0D0000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000282828282801
      0101010101010101010128282828280102020202020202020201282828280303
      0308212224262728020128282803101010041E2122242627020128282803251D
      100414191E222426020128030303231D10040404192122240201031F1F1F201C
      10101010041E21220201030D1A1B1A1C1C1D1D100414191E0201030C0D0D1516
      17181810041314190201280303030D12100404040B1113140201282828030D0F
      100408090A0B0E110201282828030C0D0C040708090A0B0E0201282828280303
      0405060708090A0B020128282828280102020202020202020201282828282801
      0101010101010101010128282828282828282828282828282828}
  end
  object BitBtnUpdate: TBitBtn
    Left = 102
    Top = 294
    Width = 107
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1048#1079#1084#1077#1085#1080#1090#1100'(F4)'
    TabOrder = 3
    OnClick = BitBtnUpdateClick
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000000000
      80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
      A600D4F0FF00B1E2FF008ED4FF006BC6FF0048B8FF0025AAFF0000AAFF000092
      DC00007AB90000629600004A730000325000D4E3FF00B1C7FF008EABFF006B8F
      FF004873FF002557FF000055FF000049DC00003DB90000319600002573000019
      5000D4D4FF00B1B1FF008E8EFF006B6BFF004848FF002525FF000000FF000000
      DC000000B900000096000000730000005000E3D4FF00C7B1FF00AB8EFF008F6B
      FF007348FF005725FF005500FF004900DC003D00B90031009600250073001900
      5000F0D4FF00E2B1FF00D48EFF00C66BFF00B848FF00AA25FF00AA00FF009200
      DC007A00B900620096004A00730032005000FFD4FF00FFB1FF00FF8EFF00FF6B
      FF00FF48FF00FF25FF00FF00FF00DC00DC00B900B90096009600730073005000
      5000FFD4F000FFB1E200FF8ED400FF6BC600FF48B800FF25AA00FF00AA00DC00
      9200B9007A009600620073004A0050003200FFD4E300FFB1C700FF8EAB00FF6B
      8F00FF487300FF255700FF005500DC004900B9003D0096003100730025005000
      1900FFD4D400FFB1B100FF8E8E00FF6B6B00FF484800FF252500FF000000DC00
      0000B9000000960000007300000050000000FFE3D400FFC7B100FFAB8E00FF8F
      6B00FF734800FF572500FF550000DC490000B93D000096310000732500005019
      0000FFF0D400FFE2B100FFD48E00FFC66B00FFB84800FFAA2500FFAA0000DC92
      0000B97A000096620000734A000050320000FFFFD400FFFFB100FFFF8E00FFFF
      6B00FFFF4800FFFF2500FFFF0000DCDC0000B9B9000096960000737300005050
      0000F0FFD400E2FFB100D4FF8E00C6FF6B00B8FF4800AAFF2500AAFF000092DC
      00007AB90000629600004A73000032500000E3FFD400C7FFB100ABFF8E008FFF
      6B0073FF480057FF250055FF000049DC00003DB9000031960000257300001950
      0000D4FFD400B1FFB1008EFF8E006BFF6B0048FF480025FF250000FF000000DC
      000000B90000009600000073000000500000D4FFE300B1FFC7008EFFAB006BFF
      8F0048FF730025FF570000FF550000DC490000B93D0000963100007325000050
      1900D4FFF000B1FFE2008EFFD4006BFFC60048FFB80025FFAA0000FFAA0000DC
      920000B97A000096620000734A0000503200D4FFFF00B1FFFF008EFFFF006BFF
      FF0048FFFF0025FFFF0000FFFF0000DCDC0000B9B90000969600007373000050
      5000F2F2F200E6E6E600DADADA00CECECE00C2C2C200B6B6B600AAAAAA009E9E
      9E0092929200868686007A7A7A006E6E6E0062626200565656004A4A4A003E3E
      3E0032323200262626001A1A1A000E0E0E00F0FBFF00A4A0A000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00E5E5E5E5E5E5
      E5E5E5E5E5E5E5E5E5E5E5F5F5F5F5F5E5E5E5E5E5E5E5E5E5E5E5F5F0E5E9E9
      F5E5E5E5E5E5E5E5E5E5E5F5FFE3E61111F5E5E5E5E5E5E5E5E5E5F5E3E61113
      0F11F5E5E5E5E5E5E5E5E5F5E70D120F130F11F5E5E5E5E5E5E5E5E5F5100C12
      0F130F11F5E5E5E5E5E5E5E5E5F5100B120F130F11F5E5E5E5E5E5E5E5E5F510
      0C120F130FA4F5E5E5E5E5E5E5E5E5F5100B120FA3A4A4F5E5E5E5E5E5E5E5E5
      F5100CAEA3121E1EF5E5E5E5E5E5E5E5E5F511AD1D1E19191DF5E5E5E5E5E5E5
      E5E5F5A31E192A1C1DF5E5E5E5E5E5E5E5E5E5F51A181C1C1EF5E5E5E5E5E5E5
      E5E5E5E5F51D1C1EF5E5E5E5E5E5E5E5E5E5E5E5E5F5F5F5E5E5}
  end
  object BitBtnDelete: TBitBtn
    Left = 448
    Top = 294
    Width = 86
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1059#1074#1086#1083#1080#1090#1100
    TabOrder = 5
    OnClick = BitBtnDeleteClick
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000003232
      3200FFFFFF00E2E2E200E0E0E000DFDFDF00DEDEDE00DDDDDD00DCDCDC00DBDB
      DB000E0E0E0004064C00DADADA00D9D9D900B3B5FB006B6FF7006D71F7001A1A
      1A00787CF8004348F5007377F800D8D8D8000E14F3002B31F4009B9EFA005A5E
      F6007A7DF8002127F3002329F400D7D7D7000C12E4002C31F4006F73F800454A
      F5000C12DD00D6D6D600494EF6001B21F300181EF300D5D5D5008689F900676B
      F7001016F3000B10D3000D13F0001F25F3000B10C800D4D4D4003237F4000A0F
      BC000C12D5000C12E600D3D3D300090DA2000A0FB8000B10CD0012157A00D2D2
      D200D1D1D100D0D0D00000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000000000003B3B3B3B3B01
      010101010101010101013B3B3B3B3B01020202020202020202013B3B3B3B3B01
      0223272F34393A3B02013B0A0A3B3B010B0B23272F34393A02010A35360A3B00
      37380B23272F343902010A302231003233220B1D23272F3402010A28292A2B2C
      2D2E0B151D23272F02013B0A24171625260B090C0D1D232702013B0A1E1F2021
      220B08090C151D2302010A162018191A1B2E0B08090D151D02010A2018101112
      1A1B0B07080C0D1502010A0E0F113B1113140B0607090C0D02013B0A0A3B3B01
      0B0B05050607080902013B3B3B3B3B01020202020202020202013B3B3B3B3B01
      010101010101010101013B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B}
  end
  object BitBtnClose: TBitBtn
    Left = 548
    Top = 294
    Width = 77
    Height = 25
    Anchors = [akLeft, akBottom]
    Cancel = True
    Caption = #1047#1072#1082#1088#1099#1090#1100
    Default = True
    ModalResult = 1
    TabOrder = 6
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
      F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
      000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
      338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
      45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
      3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
      F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
      000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
      338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
      4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
      8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
      333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
      0000}
    NumGlyphs = 2
  end
  object BitBtnRights: TBitBtn
    Left = 218
    Top = 294
    Width = 81
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1055#1088#1072#1074#1072' BOSS'#1072
    TabOrder = 4
    OnClick = BitBtnRightsClick
    NumGlyphs = 2
  end
  object CBOnlyWorkers: TCheckBox
    Left = 294
    Top = 8
    Width = 265
    Height = 17
    Anchors = [akTop, akRight]
    Caption = #1058#1086#1083#1100#1082#1086' '#1088#1072#1073#1086#1090#1072#1102#1097#1080#1077' '#1087#1086#1083#1100#1079#1086#1074#1072#1090#1077#1083#1080
    Checked = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    State = cbChecked
    TabOrder = 1
    OnClick = CBOnlyWorkersClick
  end
  object DBUsers: TDBGridEh
    Left = 8
    Top = 32
    Width = 623
    Height = 257
    Anchors = [akLeft, akTop, akRight, akBottom]
    DataSource = DSUsers
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    HorzScrollBar.Tracking = True
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    VertScrollBar.Tracking = True
    OnDblClick = DBUsersDblClick
    OnTitleClick = DBUsersTitleClick
    Columns = <
      item
        EditButtons = <>
        FieldName = 'U_ID'
        Footers = <>
        Title.Caption = #1053#1086#1084#1077#1088
        Width = 44
      end
      item
        EditButtons = <>
        FieldName = 'U_FIO'
        Footers = <>
        Title.Caption = #1055#1086#1083#1100#1079#1086#1074#1072#1090#1077#1083#1100
        Width = 133
      end
      item
        EditButtons = <>
        FieldName = 'U_COMMENT'
        Footers = <>
        Title.Caption = #1044#1086#1083#1078#1085#1086#1089#1090#1100
        Width = 145
      end
      item
        EditButtons = <>
        FieldName = 'SISCLOSED'
        Footers = <>
        Title.Caption = #1056#1072#1073#1086#1090#1072#1077#1090
        Width = 63
      end
      item
        EditButtons = <>
        FieldName = 'SISBOSS'
        Footers = <>
        Title.Caption = #1055#1088#1072#1074#1072' BOSS'#1072
        Width = 80
      end
      item
        EditButtons = <>
        FieldName = 'SIS_EDIT_PRICES'
        Footers = <>
        Title.Caption = #1056#1077#1076#1072#1082#1090#1080#1088#1091#1077#1090' '#1087#1088#1072#1081#1089#1099
        Width = 126
      end>
  end
  object DSUsers: TDataSource
    DataSet = QViewFormUsers
    Left = 40
    Top = 144
  end
  object QViewFormUsers: TZQuery
    Connection = FormMain.ZC
    OnCalcFields = QViewFormUsersCalcFields
    SQL.Strings = (
      'SELECT * FROM USERS'
      'WHERE (U_ISCLOSED=:U_ISCLOSED) OR (:U_ISCLOSED=-1)'
      'ORDER BY U_ID')
    Params = <
      item
        DataType = ftUnknown
        Name = 'U_ISCLOSED'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 40
    Top = 88
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'U_ISCLOSED'
        ParamType = ptUnknown
      end>
    object QViewFormUsersU_LOGIN: TStringField
      FieldName = 'U_LOGIN'
      Size = 30
    end
    object QViewFormUsersU_PASSWORD: TStringField
      FieldName = 'U_PASSWORD'
      Size = 10
    end
    object QViewFormUsersU_FIO: TStringField
      FieldName = 'U_FIO'
      Size = 50
    end
    object QViewFormUsersU_COMMENT: TStringField
      FieldName = 'U_COMMENT'
      Size = 50
    end
    object QViewFormUsersSISBOSS: TStringField
      FieldKind = fkCalculated
      FieldName = 'SISBOSS'
      Calculated = True
    end
    object QViewFormUsersSISACTIVE: TStringField
      FieldKind = fkCalculated
      FieldName = 'SISCLOSED'
      Calculated = True
    end
    object QViewFormUsersU_ID: TIntegerField
      FieldName = 'U_ID'
      Required = True
    end
    object QViewFormUsersU_ISBOSS: TIntegerField
      FieldName = 'U_ISBOSS'
    end
    object QViewFormUsersU_ISCLOSED: TSmallintField
      FieldName = 'U_ISCLOSED'
      Required = True
    end
    object QViewFormUsersU_EDIT_PRICES: TSmallintField
      FieldName = 'U_EDIT_PRICES'
      Required = True
    end
    object QViewFormUsersSIS_EDIT_PRICES: TStringField
      FieldKind = fkCalculated
      FieldName = 'SIS_EDIT_PRICES'
      Calculated = True
    end
  end
  object QGrantBoss: TZQuery
    Connection = FormMain.ZC
    SQL.Strings = (
      'UPDATE USERS'
      'SET U_ISBOSS=:U_ISBOSS'
      'WHERE U_ID=:U_ID')
    Params = <
      item
        DataType = ftUnknown
        Name = 'U_ISBOSS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'U_ID'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 104
    Top = 144
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'U_ISBOSS'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'U_ID'
        ParamType = ptUnknown
      end>
  end
  object QInsertGrant: TZQuery
    Connection = FormMain.ZC
    SQL.Strings = (
      'INSERT INTO USERSFORBOSS (UB_USERID,UB_VIEWERID) '
      'VALUES (:UB_USERID,:UB_VIEWERID) '
      '')
    Params = <
      item
        DataType = ftUnknown
        Name = 'UB_USERID'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'UB_VIEWERID'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 240
    Top = 144
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'UB_USERID'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'UB_VIEWERID'
        ParamType = ptUnknown
      end>
  end
  object QUsersWOMe: TZQuery
    Connection = FormMain.ZC
    SQL.Strings = (
      'SELECT * FROM USERS'
      'WHERE U_ID<>:U_ID')
    Params = <
      item
        DataType = ftUnknown
        Name = 'U_ID'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 168
    Top = 144
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'U_ID'
        ParamType = ptUnknown
      end>
  end
  object QDeleteGrantV: TZQuery
    Connection = FormMain.ZC
    SQL.Strings = (
      'DELETE FROM  USERSFORBOSS '
      'WHERE UB_VIEWERID=:UB_VIEWERID')
    Params = <
      item
        DataType = ftUnknown
        Name = 'UB_VIEWERID'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 232
    Top = 96
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'UB_VIEWERID'
        ParamType = ptUnknown
      end>
  end
  object QUserTitles: TZQuery
    Connection = FormMain.ZC
    SQL.Strings = (
      'SELECT J_ID AS ID FROM JOBS'
      'WHERE J_USERID=:USERID'
      'UNION ALL'
      'SELECT CM_ID AS ID FROM COMPANY'
      'WHERE CM_OWNER=:USERID')
    Params = <
      item
        DataType = ftUnknown
        Name = 'USERID'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 120
    Top = 88
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'USERID'
        ParamType = ptUnknown
      end>
  end
  object QMoveCom: TZQuery
    Connection = FormMain.ZC
    SQL.Strings = (
      'update company'
      'set cm_owner=:UserTO'
      'where cm_owner=:userfrom'
      'and cm_isclosed=0')
    Params = <
      item
        DataType = ftUnknown
        Name = 'UserTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'userfrom'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 424
    Top = 80
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'UserTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'userfrom'
        ParamType = ptUnknown
      end>
    object IntegerField1: TIntegerField
      FieldName = 'CNTR'
      ReadOnly = True
      Required = True
    end
    object StringField1: TStringField
      FieldName = 'COMENT'
      ReadOnly = True
      Required = True
      Size = 7
    end
  end
  object QMoveCon_Own: TZQuery
    Connection = FormMain.ZC
    SQL.Strings = (
      'update contacts '
      'set cn_owner=:UserTO'
      'where cn_owner=:userfrom'
      'and cn_isclosed=0')
    Params = <
      item
        DataType = ftUnknown
        Name = 'UserTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'userfrom'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 328
    Top = 136
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'UserTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'userfrom'
        ParamType = ptUnknown
      end>
    object IntegerField2: TIntegerField
      FieldName = 'CNTR'
      ReadOnly = True
      Required = True
    end
    object StringField2: TStringField
      FieldName = 'COMENT'
      ReadOnly = True
      Required = True
      Size = 7
    end
  end
  object QMoveCon_Man: TZQuery
    Connection = FormMain.ZC
    SQL.Strings = (
      'update contacts '
      'set cn_manager=:UserTO'
      'where cn_manager=:UserFrom'
      'and cn_isclosed=0')
    Params = <
      item
        DataType = ftUnknown
        Name = 'UserTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'userfrom'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 424
    Top = 136
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'UserTO'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'userfrom'
        ParamType = ptUnknown
      end>
    object IntegerField3: TIntegerField
      FieldName = 'CNTR'
      ReadOnly = True
      Required = True
    end
    object StringField3: TStringField
      FieldName = 'COMENT'
      ReadOnly = True
      Required = True
      Size = 7
    end
  end
end
